home *** CD-ROM | disk | FTP | other *** search
/ Over 1,000 Windows 95 Programs / Over 1000 Windows 95 Programs (Microforum) (Disc 2).iso / 0531 / 31vgw200.exe / ATTEXAMP.FRM < prev    next >
Encoding:
Text File  |  1997-01-15  |  1.7 KB  |  67 lines
  1. {This form writes various kinds of attendance for one student!
  2. [SAY"This form writes various kinds of attendance for one student."][CtrJust][Print"BoldOn"]["Attendance Summary"][Print"BoldOff"][LJust]
  3.  
  4. Class: [classname]
  5. Date: [date]
  6. Attendance days: [AttTotal]
  7.  
  8. ["Student Name:":22] [name]
  9. ["Student ID:":22] [id]
  10.  
  11. ["Times Present:":22] [AttPresent:6]
  12. ["Times Excused:":22] [AttExcused:6]
  13. ["Times Unexcused:":22] [AttUnex:6]
  14. ["Times Late":22] [AttLate:6]
  15. ["Times Other":22] [AttOther:6]
  16. ["Times Not present":22] [AttNotPres:6]
  17. [" ":22] ["========":8]
  18. ["Total days":22] [AttTotal:6]
  19.  
  20. Any single day:
  21.  
  22. ["#":5] ["Date":25] ["Ch":2] ["Attendance"]
  23. [AttDay8][AttNumber:5] [AttName:25] [AttChar:2] [AttString:10]
  24. [AttDay3][AttNumber:5] [AttName:25] [AttChar:2] [AttString:10]
  25.  
  26. All days from 3 to 7:
  27.  
  28. ["#":5] ["Date":25] ["Ch":2] ["Attendance"]
  29. [AttRepeat:3:7][AttNumber:5] [AttName:25] [AttChar:2] [AttString:10]
  30.  
  31. Only days present:
  32.  
  33. ["#":5] ["Date":25] ["Ch":2] ["Attendance"]
  34. [AttRepeat][IFAttPres][AttNumber:5] [AttName:25] [AttChar:2] [AttString:10]
  35.  
  36. Unexcused absences:
  37.  
  38. ["#":5] ["Date":25] ["Ch":2] ["Attendance"]
  39. [AttRepeat][IFAttUnex][AttNumber:5] [AttName:25] [AttChar:2] [AttString:10]
  40.  
  41. All days:
  42.  
  43. ["#":5] ["Date":25] ["Ch":2] ["Attendance"]
  44. [AttRepeat][AttNumber:5] [AttName:25] [AttChar:2] [AttString:10]
  45.  
  46. DAYS ON ONE LINE:
  47.  
  48. All days from 3 to 7:
  49. [Print"Offset=5"]
  50. [AttRepeat:3:7][NoLine][AttName]["  "]
  51. [Print"Offset=0"]
  52.  
  53. Days present:
  54. [Print"Offset=5"]
  55. [AttRepeat][NoLine][IFAttPres][AttName]["  "]
  56. [Print"Offset=0"]
  57.  
  58. Unexcused absences:
  59. [Print"Offset=5"]
  60. [AttRepeat][NoLine][IFAttUnex][AttName]["  "]
  61. [Print"Offset=0"]
  62.  
  63. All days:
  64. [Print"Offset=5"]
  65. [AttRepeat][NoLine][AttName]["  "]
  66. [Print"Offset=0"]
  67.